| Filename | (eval 113)[/usr/share/perl5/Sub/Quote.pm:5] |
| Statements | Executed 33 statements in 471µs |
| Eval Invoked At | /usr/share/perl5/Sub/Quote.pm line 5 |
| Sibling evals | 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18 |
| Calls | P | F | Exclusive Time |
Inclusive Time |
Subroutine |
|---|---|---|---|---|---|
| 2 | 2 | 2 | 36µs | 1.56ms | Search::Elasticsearch::Bulk::new |
| 1 | 1 | 1 | 12µs | 24µs | Sub::Quote::BEGIN@5.42 |
| 1 | 1 | 1 | 8µs | 8µs | Method::Generate::Constructor::BEGIN@8.43 |
| Line | State ments |
Time on line |
Calls | Time in subs |
Code |
|---|---|---|---|---|---|
| 1 | { | ||||
| 2 | 2 | 2µs | my $default_for__5flast_5fflush = ${$_[1]->{"\$default_for__5flast_5fflush"}}; | ||
| 3 | 1 | 500ns | my $default_for__5fbuffer = ${$_[1]->{"\$default_for__5fbuffer"}}; | ||
| 4 | 1 | 200ns | my $_QUOTED = ${$_[1]->{"\$_QUOTED"}}; | ||
| 5 | 2 | 63µs | 2 | 34µs | # spent 24µs (12+11) within Sub::Quote::BEGIN@5.42 which was called:
# once (12µs+11µs) by Sub::Quote::_clean_eval at line 5 # spent 24µs making 1 call to Sub::Quote::BEGIN@5.42
# spent 11µs making 1 call to warnings::unimport |
| 6 | # spent 1.56ms (36µs+1.52) within Search::Elasticsearch::Bulk::new which was called 2 times, avg 780µs/call:
# once (6µs+1.50ms) by Search::Elasticsearch::Role::Client::Direct::Main::bulk_helper at line 56 of /opt/flows/lib/lib/perl5/Search/Elasticsearch/Role/Client/Direct/Main.pm
# once (30µs+22µs) by Search::Elasticsearch::Role::Client::Direct::Main::bulk_helper at line 53 of Sub/Defer.pm | ||||
| 7 | package Method::Generate::Constructor; | ||||
| 8 | # spent 8µs within Method::Generate::Constructor::BEGIN@8.43 which was called:
# once (8µs+0s) by Sub::Quote::_clean_eval at line 13 | ||||
| 9 | 1 | 1µs | $^H = "2018"; | ||
| 10 | 1 | 600ns | ${^WARNING_BITS} = "\377\377\377\377\377\377\377\377\377\377\377\377\377\377\377\003"; | ||
| 11 | 1 | 6µs | %^H = ( | ||
| 12 | ); | ||||
| 13 | 1 | 364µs | 1 | 8µs | } # spent 8µs making 1 call to Method::Generate::Constructor::BEGIN@8.43 |
| 14 | 1 | 600ns | my $class = shift; | ||
| 15 | 1 | 300ns | $class = ref($class) if ref($class); | ||
| 16 | 1 | 200ns | if ($class ne "Search::Elasticsearch::Bulk") { | ||
| 17 | if ($Moo::MAKERS{$class}) { | ||||
| 18 | Moo->_constructor_maker_for($class,"Search::Elasticsearch::Bulk"); | ||||
| 19 | return $class->new(@_); | ||||
| 20 | } elsif ($INC{"Moose.pm"} and my $meta = Class::MOP::get_metaclass_by_name($class)) { | ||||
| 21 | return $meta->new_object($class->BUILDARGS(@_)); | ||||
| 22 | } | ||||
| 23 | } | ||||
| 24 | 1 | 2µs | 1 | 18µs | my $args = $class->BUILDARGS(@_); # spent 18µs making 1 call to Search::Elasticsearch::Role::Bulk::BUILDARGS |
| 25 | 1 | 500ns | die "BUILDARGS did not return a hashref" unless ref($args) eq 'HASH'; | ||
| 26 | 1 | 2µs | if (my @missing = grep !exists $args->{$_}, qw(es)) { | ||
| 27 | die "Missing required arguments: ".join(', ', sort @missing); | ||||
| 28 | } | ||||
| 29 | 1 | 1µs | my $new = bless({}, $class);; | ||
| 30 | 1 | 6µs | 1 | 2µs | $new->{"_buffer"} = ( # spent 2µs making 1 call to Search::Elasticsearch::Role::Bulk::__ANON__[/opt/flows/lib/lib/perl5/Search/Elasticsearch/Role/Bulk.pm:19] |
| 31 | exists $args->{"_buffer"} | ||||
| 32 | ? $args->{"_buffer"} | ||||
| 33 | : $default_for__5fbuffer->($new) | ||||
| 34 | ); | ||||
| 35 | 1 | 800ns | $new->{"_buffer_count"} = ( | ||
| 36 | exists $args->{"_buffer_count"} | ||||
| 37 | ? $args->{"_buffer_count"} | ||||
| 38 | : "0" | ||||
| 39 | ); | ||||
| 40 | 1 | 500ns | $new->{"_buffer_size"} = ( | ||
| 41 | exists $args->{"_buffer_size"} | ||||
| 42 | ? $args->{"_buffer_size"} | ||||
| 43 | : "0" | ||||
| 44 | ); | ||||
| 45 | 1 | 700ns | if (exists $args->{"_bulk_args"}) { | ||
| 46 | $new->{"_bulk_args"} = $args->{"_bulk_args"}; | ||||
| 47 | } | ||||
| 48 | 1 | 3µs | 1 | 2µs | $new->{"_last_flush"} = ( # spent 2µs making 1 call to Search::Elasticsearch::Role::Bulk::__ANON__[/opt/flows/lib/lib/perl5/Search/Elasticsearch/Role/Bulk.pm:24] |
| 49 | exists $args->{"_last_flush"} | ||||
| 50 | ? $args->{"_last_flush"} | ||||
| 51 | : $default_for__5flast_5fflush->($new) | ||||
| 52 | ); | ||||
| 53 | 1 | 300ns | if (exists $args->{"_serializer"}) { | ||
| 54 | $new->{"_serializer"} = $args->{"_serializer"}; | ||||
| 55 | } | ||||
| 56 | 1 | 600ns | if (exists $args->{"es"}) { | ||
| 57 | $new->{"es"} = $args->{"es"}; | ||||
| 58 | } | ||||
| 59 | 1 | 600ns | $new->{"max_count"} = ( | ||
| 60 | exists $args->{"max_count"} | ||||
| 61 | ? $args->{"max_count"} | ||||
| 62 | : "1000" | ||||
| 63 | ); | ||||
| 64 | 1 | 1µs | $new->{"max_size"} = ( | ||
| 65 | exists $args->{"max_size"} | ||||
| 66 | ? $args->{"max_size"} | ||||
| 67 | : "1000000" | ||||
| 68 | ); | ||||
| 69 | 1 | 500ns | $new->{"max_time"} = ( | ||
| 70 | exists $args->{"max_time"} | ||||
| 71 | ? $args->{"max_time"} | ||||
| 72 | : "0" | ||||
| 73 | ); | ||||
| 74 | 1 | 500ns | $new->{"on_conflict"} = ( | ||
| 75 | exists $args->{"on_conflict"} | ||||
| 76 | ? $args->{"on_conflict"} | ||||
| 77 | : "0" | ||||
| 78 | ); | ||||
| 79 | 1 | 200ns | if (exists $args->{"on_error"}) { | ||
| 80 | $new->{"on_error"} = $args->{"on_error"}; | ||||
| 81 | } | ||||
| 82 | 1 | 500ns | $new->{"on_success"} = ( | ||
| 83 | exists $args->{"on_success"} | ||||
| 84 | ? $args->{"on_success"} | ||||
| 85 | : "0" | ||||
| 86 | ); | ||||
| 87 | 1 | 200ns | if (exists $args->{"verbose"}) { | ||
| 88 | $new->{"verbose"} = $args->{"verbose"}; | ||||
| 89 | } | ||||
| 90 | 1 | 4µs | return $new; | ||
| 91 | } | ||||
| 92 | 1 | 1µs | $_QUOTED->[3] = \&Search::Elasticsearch::Bulk::new | ||
| 93 | } | ||||
| 94 | 1 | 6µs | 1; | ||
| 95 | |||||
| 96 | ; |